program programa;
aspect aspecto1
	write("casa")
before teste : aspecto1;
begin
end.
